home *** CD-ROM | disk | FTP | other *** search
/ Magnum One / Magnum One (Mid-American Digital) (Disc Manufacturing).iso / d12 / jazlib.arc / JZRGTJST.C < prev    next >
Text File  |  1988-12-18  |  361b  |  21 lines

  1. char *jzrgtjst(fstr,flen)
  2. char *fstr;
  3. int flen;
  4. {
  5.   static char wbuf[256];
  6.   int len,w;
  7.   char wtemp[256];
  8.  
  9.   strcpy(wtemp,fstr);
  10.   w = strlen(wtemp);
  11.   len = w-1;
  12.  
  13.   if (wtemp[len] == ' ') {
  14.     do len --; while(wtemp[len] == ' ');
  15.     wtemp[++len] = 0;
  16.   }
  17.  
  18.   sprintf(wbuf,"%s%s",jzpad(flen - strlen(wtemp),' '),wtemp);
  19.   return(wbuf);
  20. }
  21.